home *** CD-ROM | disk | FTP | other *** search
/ Amiga Games: Greatest Hits 1996 / Amiga Games: Greatest Hits 1996.iso / userbox / publicdomain / yagin / examples / new_newsgroup < prev    next >
AmigaDOS Script File  |  1996-07-06  |  616b  |  23 lines
  1. .key GROUP/A,EXPDAYS,EXPARTS
  2. .bra [
  3. .ket ]
  4.  
  5. .def EXPDAYS 21
  6. .def EXPARTS 2000
  7.  
  8. ; $VER: New_NewsGroup 1.0 (5.7.95) Arndt van der Molen
  9.  
  10. ;Create an empty file if not existing because 'newgroup' want to read it first
  11. IF NOT EXISTS UULIB:News/Active
  12.   echo >UULIB:News/Active
  13. ENDIF
  14.  
  15. echo "*NAdding newsgroup to 'UULIB:News/Active' for NNTP ...*N"
  16. INet:c/newgroup UULIB:News/Active [GROUP]
  17. echo ""
  18.  
  19. echo "Adding newsgroup with expiry of [EXPDAYS] days and max. [EXPARTS] articles*Nto 'UULIB:Newsgroups' for UUCP ...'*N"
  20. echo >>UULIB:NewsGroups "[GROUP] [EXPDAYS] [EXPARTS]"
  21.  
  22. echo "You are now subscribed to '[GROUP]'.*N"
  23.